CAADiameters_MarsSemidiameterB <-
function(Delta){
.Call("CAADiameters_MarsSemidiameterB", Delta)
}
